inherited FPesquisaMovimentoContabilidade: TFPesquisaMovimentoContabilidade
  Left = 261
  Top = 140
  Caption = 'Pesquisa Movimento Contabilidade'
  ClientHeight = 286
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 13
  inherited Panel2: TPanel
    inherited BtnLimpar: TBitBtn
      OnClick = BtnLimparClick
    end
    inherited BtnImprimir: TBitBtn
      OnClick = BtnImprimirClick
    end
    inherited BtnSelecionar: TBitBtn
      Enabled = False
    end
  end
  inherited Panel1: TPanel
    Height = 245
    object Label1: TLabel [0]
      Left = 6
      Top = 1
      Width = 60
      Height = 13
      Caption = 'Grupo Conta'
    end
    object Label2: TLabel [1]
      Left = 87
      Top = 1
      Width = 28
      Height = 13
      Caption = 'Conta'
    end
    object Label9: TLabel [2]
      Left = 6
      Top = 36
      Width = 85
      Height = 13
      Caption = 'Data Lan'#231'amento'
    end
    object Label6: TLabel [3]
      Left = 95
      Top = 57
      Width = 6
      Height = 13
      Caption = 'a'
    end
    object Label10: TLabel [4]
      Left = 6
      Top = 94
      Width = 46
      Height = 13
      Caption = 'Empresas'
    end
    inherited DBGrid1: TDBGrid
      Top = 149
      Height = 75
    end
    inherited Panel3: TPanel
      Top = 224
    end
    object EGrupo: TEdit
      Left = 6
      Top = 14
      Width = 41
      Height = 21
      TabOrder = 2
    end
    object DBLCBConta: TDBLookupComboBox
      Left = 87
      Top = 14
      Width = 314
      Height = 21
      KeyField = 'CONT_CORR_CODIGO'
      ListField = 'CONT_CORR_DESCRICAO'
      ListSource = DSConta
      TabOrder = 3
      OnKeyDown = DBLCBContaKeyDown
    end
    object DEDataIni: TDateEdit
      Left = 6
      Top = 53
      Width = 88
      Height = 21
      NumGlyphs = 2
      TabOrder = 4
    end
    object DEDataFim: TDateEdit
      Left = 103
      Top = 53
      Width = 90
      Height = 21
      NumGlyphs = 2
      TabOrder = 5
    end
    object CkBTodasEmpresas: TCheckBox
      Left = 6
      Top = 76
      Width = 118
      Height = 17
      Caption = 'Todas as Empresas'
      TabOrder = 6
      OnClick = CkBTodasEmpresasClick
    end
    object CLBEmpresas: TCheckListBox
      Left = 1
      Top = 109
      Width = 409
      Height = 40
      Align = alBottom
      Columns = 1
      ItemHeight = 13
      TabOrder = 7
    end
    object RGFiltro: TRadioGroup
      Left = 199
      Top = 41
      Width = 201
      Height = 49
      Caption = 'Filtro'
      ItemIndex = 0
      Items.Strings = (
        'Todos'
        'Lanc e Contas C/ Conta Cont'#225'bil')
      TabOrder = 8
    end
  end
  inherited QPesquisa: TQuery
    SQL.Strings = (
      
        'Select LANC_CODIGO as lancamento,LANC_DATA as data ,LANC_HISTORI' +
        'CO1 as hist1,LANC_HISTORICO2 as hist2,LANC_VALOR as valor,LANC_C' +
        'ONTA as Codconta,CONTACORRENTE.CONT_CORR_DESCRICAO as conta,PLAN' +
        'OCONTAS.ESTRUTURA as estrutura'
      
        ',LANC_CPCR AS CPCR,LANC_TITULO as Titulo,PLANOCONTAS.DESCRICAO a' +
        's plano,PLANOCONTAS.NATUREZA as natureza,PLANOCONTABILIDADE.PLAN' +
        'OCONT_DESCRICAO as ContaContabilLanc,PLANOCONTABILIDADE.PLANOCON' +
        'T_CODIGOREDUZIDO as CodigoReduzidoLanc'
      ''
      
        'From LANCAMENTO INNER JOIN PLANOCONTAS ON LANC_PLANO = PLANOCONT' +
        'AS.CODIGO Left JOIN PLANOCONTABILIDADE ON Lanc_CONTACONTABIL = P' +
        'LANOCONT_CODIGO Left JOIN CONTACORRENTE on LANC_CONTA = CONT_COR' +
        'R_CODIGO'
      ''
      
        'Order by Cont_Corr_Codigo,Cont_Corr_Descricao,Lanc_Data,Lanc_Cod' +
        'igo,Lanc_Historico1,Lanc_Historico2,Lanc_Valor,PlanoContas.Natur' +
        'eza')
    Left = 128
    Top = 217
  end
  inherited DSPesquisa: TDataSource
    DataSet = QMovimentoContabilidade
    Left = 168
    Top = 217
  end
  object QMovimentoContabilidade: TQuery
    AfterPost = QMovimentoContabilidadeAfterPost
    AfterDelete = QMovimentoContabilidadeAfterDelete
    DatabaseName = 'baseLocal'
    RequestLive = True
    SQL.Strings = (
      'Select * from MOVIMENTOCONTABILIDADE'
      'Order by CODCONTA,CONTA,LANCAMENTO,DATA,ESTRUTURA ')
    Left = 224
    Top = 217
  end
  object QAux: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      
        'Select CONT_CORR_CODIGO,PLANOCONTABILIDADE.PLANOCONT_DESCRICAO a' +
        's ContaContabil,PLANOCONTABILIDADE.PLANOCONT_CODIGOREDUZIDO as C' +
        'odigoReduzido '
      
        ' From CONTACORRENTE INNER JOIN PLANOCONTABILIDADE ON CONTACORREN' +
        'TE.CONT_CORR_CONTACONTABIL = PLANOCONT_CODIGO ')
    Left = 272
    Top = 217
  end
  object DSConta: TDataSource
    DataSet = DMFinanceiro.QConta
    Left = 216
    Top = 48
  end
  object QAux2: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'Select PLANOCONTABILIDADE.PLANOCONT_DESCRICAO as ContaContabil'
      'From'
      
        'CONTACORRENTE INNER JOIN PLANOCONTABILIDADE ON CONTACORRENTE.CON' +
        'T_CORR_CONTACONTABIL = PLANOCONT_CODIGO'
      ''
      '')
    Left = 304
    Top = 217
  end
end
